home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gekikoh Dennoh Club 1
/
Gekikoh Dennoh Club Vol. 1 (Japan).7z
/
Gekikoh Dennoh Club Vol. 1 (Japan) (Track 1).bin
/
kowin
/
archive
/
apl
/
beav13ko.lzh
/
beav68.dif
< prev
next >
Wrap
Text File
|
1995-02-08
|
10KB
|
486 lines
Only in be: Makefile
Only in be: basic.o
Only in be: beav.win
Only in be: beav.x
Only in be: beav68.doc
Only in be: buffer.o
Only in be: cinfo.o
diff -c2 +text q:/beav132/def.h be/def.h
*** q:/beav132/def.h Wed Mar 16 09:57:40 1994
--- be/def.h Sat Feb 04 17:07:00 1995
***************
*** 73,82 ****
#define BDC2 '/' /* Buffer names. jam */
! #ifdef UNIX
! #define PATHCHR ':'
! #define SEPCHAR '/'
#else
! #define PATHCHR ';'
! #define SEPCHAR 0x5c /* this is a \ char */
#endif
--- 73,87 ----
#define BDC2 '/' /* Buffer names. jam */
! #ifdef HUMAN
! # define PATHCHR ';'
! # define SEPCHAR '/'
#else
! # ifdef UNIX
! # define PATHCHR ':'
! # define SEPCHAR '/'
! # else
! # define PATHCHR ';'
! # define SEPCHAR 0x5c /* this is a \ char */
! # endif
#endif
***************
*** 530,531 ****
--- 535,551 ----
extern char *strcpy();
extern char *strcat();
+
+ #ifdef HUMAN
+ # ifndef KANJI
+ # define KANJI
+ # endif
+ # ifdef KOWIN
+ # include <mtm_stdio.h>
+ # ifndef getenv
+ # define getenv KoWindowGetEnv
+ # endif
+ # ifndef MF_FIO
+ # define MF_FIO
+ # endif
+ # endif
+ #endif
diff -c2 +text q:/beav132/display.c be/display.c
*** q:/beav132/display.c Wed Mar 16 09:57:32 1994
--- be/display.c Wed Feb 08 06:57:06 1995
***************
*** 136,139 ****
--- 136,143 ----
VIDEO blanks; /* Blank line image. */
+ #ifdef HUMAN
+ unsigned char _HexCh[]= "0123456789ABCDEF";
+ #endif
+
/*
* Initialize the data structures used
***************
*** 309,313 ****
--- 313,332 ----
case HEX:
/* print the row offset from the start of the file in HEX */
+ #ifdef HUMAN
+ { /* [ 00000000] */
+ unsigned char *s= vp->v_text, *p;
+ unsigned int i= row_offst;
+ *s++= ' ';
+ *s++= ' ';
+ *s++= ' ';
+ p= s+11-3;
+ do{
+ *--p= _HexCh[(i & 0xf)];
+ }while( i >>= 4 );
+ for(; s < p ; *s++= ' ' );
+ }
+ #else
sprintf (vp -> v_text, MSG_11lX, row_offst);/* to vid buf */
+ #endif
break;
case OCTAL:
***************
*** 366,369 ****
--- 385,391 ----
uint temp_int;
ulong temp_long;
+ #ifdef KANJI
+ int kanji= 0;
+ #endif
mode = fmt_ptr -> r_type; /* get type of format structure */
***************
*** 378,381 ****
--- 400,423 ----
{
ch = bin_buf[i];
+ #ifdef KANJI
+ if( kanji ){
+ uint c= (bin_buf[i-1]<<8)+ch;
+ kanji= 0;
+ if( SFTJIS( c ) < 0 ){
+ txt_buf[posn[0]+i-1]= '.';
+ goto label;
+ }else
+ txt_buf[posn[0]+i]= ch;
+ }else{
+ label:
+ if( ch < ' ' ){
+ txt_buf[posn[0] + i] = '.';
+ }else if( (ch>=0x80 && ch<0xa0) || ch>=0xe0 ){
+ kanji= 1;
+ txt_buf[posn[0]+i]= ch;
+ }else
+ txt_buf[posn[0]+i]= ch;
+ }
+ #else
if ((ch >= ' ') && (ch < 0x7f))
txt_buf[posn[0] + i] = ch;
***************
*** 382,386 ****
--- 424,433 ----
else
txt_buf[posn[0] + i] = '.';
+ #endif
}
+ #ifdef KANJI
+ if( kanji )
+ txt_buf[posn[0]+i-1]= '.';
+ #endif
break;
***************
*** 466,469 ****
--- 513,543 ----
for (i = 0; i < len; i++)
{
+ #ifdef KANJI
+ ch= bin_buf[i];
+ if( kanji ){
+ uint c= (bin_buf[i-1]<<8)+ch;
+ kanji= 0;
+ if( SFTJIS( c ) < 0 ){
+ txt_buf[posn[i+16-1]]= '.';
+ goto label2;
+ }else
+ txt_buf[posn[i+16]]= ch;
+ }else{
+ label2:
+ if( ch < ' ' ){
+ txt_buf[posn[i+16]]= '.';
+ }else if( (ch>=0x80 && ch<0xa0) || ch>=0xe0 ){
+ kanji= 1;
+ txt_buf[posn[i+16]]= ch;
+ }else
+ txt_buf[posn[i+16]]= ch;
+ }
+ {
+ uchar *ptr= &txt_buf[posn[i]];
+ *ptr++= _HexCh[ch>>4];
+ *ptr++= _HexCh[ch&0xf];
+ *ptr= '\0';
+ }
+ #else
if ((bin_buf[i] >= ' ') && (bin_buf[i] < 0x7f))
txt_buf[posn[i + 16]] = 0xff & bin_buf[i];
***************
*** 471,475 ****
--- 545,554 ----
txt_buf[posn[i + 16]] = '.';
sprintf (&txt_buf[posn[i]], MSG_02X, 0xff & bin_buf[i]);
+ #endif
}
+ #ifdef KANJI
+ if( kanji )
+ txt_buf[posn[i+16-1]]= '.';
+ #endif
break;
Only in be: display.o
Only in be: ebcdic.o
Only in be: echo.o
Only in be: extend.o
diff -c2 +text q:/beav132/file.c be/file.c
*** q:/beav132/file.c Wed Mar 16 09:57:32 1994
--- be/file.c Wed Feb 08 07:19:44 1995
***************
*** 328,332 ****
--- 328,336 ----
#endif
if ((start == 0L) && (end == MAXPOS))
+ #ifdef KOWIN
+ strcpy (bp -> b_fname, (void*)PathGetFullName(fname) );
+ #else
strcpy (bp -> b_fname, fname);
+ #endif
else
strcpy (bp -> b_fname, MSG_null);
***************
*** 507,511 ****
--- 511,519 ----
if ((s = writeout (fname, start, end, S_IREAD | S_IWRITE)) == TRUE)
{
+ #ifdef KOWIN
+ strcpy (curbp -> b_fname, (void*)PathGetFullName(fname) );
+ #else
strcpy (curbp -> b_fname, fname);
+ #endif
curbp -> b_flag &= ~BFCHG;
wp = wheadp; /* Update mode lines. */
***************
*** 710,714 ****
--- 718,726 ----
BUF_START(curwp) = start;
l_fix_up (curbp -> b_linep -> l_fp); /* adjust file offsets from first line */
+ #ifdef KOWIN
+ strcpy (curbp -> b_fname, (void*)PathGetFullName(fname) );
+ #else
strcpy (curbp -> b_fname, fname);/* Fix name. */
+ #endif
wp = wheadp; /* Update mode lines. */
while (wp != NULL)
Only in be: file.o
diff -c2 +text q:/beav132/fileio.c be/fileio.c
*** q:/beav132/fileio.c Wed Mar 16 09:57:42 1994
--- be/fileio.c Thu Feb 02 23:10:46 1995
***************
*** 15,18 ****
--- 15,23 ----
#include "def.h"
+ #ifdef MF_FIO /* Human */
+ #include <sys_doslib.h>
+ #include <microfio.h>
+ #endif
+
extern char MSG_cnt_wr[];
extern char MSG_wr_io_er[];
***************
*** 35,38 ****
--- 40,47 ----
#endif
+ #ifdef MF_FIO
+ static m_file fm;
+ #endif
+
/*
* Open a file for reading.
***************
*** 48,52 ****
--- 57,69 ----
#endif
#ifdef UNIX
+ # ifdef HUMAN
+ # ifdef MF_FIO
+ if( !Mopen( &fm, fn ) )
+ # else
+ if ((ffp = open (fn, O_RDONLY|O_BINARY)) == -1)/* pvr */
+ # endif
+ # else
if ((ffp = open (fn, O_RDONLY)) == -1)/* pvr */
+ #endif
return (FIOERR);
;
***************
*** 79,82 ****
--- 96,102 ----
#endif
#ifdef UNIX
+ # ifdef MF_FIO
+ return Mfsize( &fm );
+ # else
struct stat st;
***************
*** 84,87 ****
--- 104,108 ----
return (-1);
return (st.st_size);
+ # endif
#endif
}
***************
*** 108,112 ****
--- 129,141 ----
#ifdef UNIX
/* set perms as in original file 1.31 */
+ # ifdef HUMAN
+ # ifdef MF_FIO
+ if( !Mcreate( &fm, fn ) )
+ # else
+ if ((ffp = open (fn, O_WRONLY | O_CREAT | O_BINARY, mode)) == -1)
+ # endif
+ # else
if ((ffp = open (fn, O_WRONLY | O_CREAT, mode)) == -1)/* pvr */
+ # endif
return (FIOERR);
;
***************
*** 132,136 ****
--- 161,169 ----
#endif
#ifdef UNIX
+ # ifdef MF_FIO
+ Mclose( &fm );
+ # else
close (ffp);
+ # endif
#endif
return (FIOSUC);
***************
*** 151,154 ****
--- 184,194 ----
int nbuf;
{
+ #ifdef MF_FIO
+ if( !Mwrite( &fm, buf, nbuf ) ){
+ err_echo (MSG_wr_io_er);
+ return (FIOERR);
+ }
+ return (FIOSUC);
+ #else /* MF_FIO */
register int i;
***************
*** 174,177 ****
--- 214,218 ----
}
return (FIOSUC);
+ #endif /* MF_FIO */
}
***************
*** 185,188 ****
--- 226,235 ----
register LPOS *rbuf, nbuf;
{
+ #ifdef MF_FIO
+ *rbuf= Mread( &fm, buf, nbuf );
+ if (*rbuf == 0)
+ return (FIOEOF);
+ return (FIOSUC);
+ #else /* MF_FIO */
#ifdef MSDOS
*rbuf = fread (buf, 1, nbuf, ffp);
***************
*** 208,211 ****
--- 255,259 ----
return (FIOSUC);
+ #endif /* MF_FIO */
}
***************
*** 222,226 ****
--- 270,278 ----
#endif
#ifdef UNIX
+ # ifdef MF_FIO
+ return Mseek( &fm, posn, 0 );
+ # else
return (lseek (ffp, posn, 0));
+ # endif
#endif
#ifdef AMIGA
Only in be: fileio.o
Only in be: format.o
Only in be: humanio.c
Only in be: humanio.o
Only in be: kbd.o
Only in be: line.o
Only in be: main.o
Only in be: mtm_conf.c
Only in be: mtm_conf.o
Only in be: random.o
Only in be: region.o
Only in be: search.o
Only in be: spawn.o
Only in be: symbol.o
diff -c2 +text q:/beav132/text.c be/text.c
*** q:/beav132/text.c Wed Mar 16 09:57:30 1994
--- be/text.c Fri Feb 03 00:26:44 1995
***************
*** 166,170 ****
--- 166,174 ----
char MSG_end_mac[] = "End macro";
char MSG_num_mod[] = "Number of modifcations per update: ";
+ #ifdef HUMAN
+ char version[] = "BEAV, Ver 1.32, 11/07/91 (X68K v1.1)";
+ #else
char version[] = "BEAV, Ver 1.32, 11/07/91";
+ #endif
/* in random.c */
Only in be: text.o
diff -c2 +text q:/beav132/tty.c be/tty.c
*** q:/beav132/tty.c Wed Mar 16 09:58:04 1994
--- be/tty.c Sat Feb 04 06:55:18 1995
***************
*** 17,20 ****
--- 17,24 ----
extern void tcapmove ();
+ #ifdef HUMAN
+ # undef UNIX
+ #endif
+
#ifdef MSDOS
#include "dos.h"
***************
*** 67,70 ****
--- 71,77 ----
void ttmove (row, col)
{
+ #ifdef HUMAN
+ HumanGoto( col, row );
+ #endif
#ifdef MSDOS
union REGS regs;
***************
*** 103,107 ****
--- 110,118 ----
void tteeol ()
{
+ #ifdef HUMAN
+ HumanEol();
+ #else
char col, row, i;
+ #endif
#ifdef MSDOS
union REGS regs;
***************
*** 154,157 ****
--- 165,171 ----
void tteeop ()
{
+ #ifdef HUMAN
+ HumanEop();
+ #endif
#ifdef MSDOS
union REGS regs;
***************
*** 198,203 ****
--- 212,221 ----
void ttbeep ()
{
+ #ifdef HUMAN
+ HumanBeep();
+ #else
ttputc (BEL);
ttflush ();
+ #endif
}
***************
*** 236,239 ****
--- 254,261 ----
register int color;
{
+ #ifdef HUMAN
+ tthue = color; /* Save the color. */
+ HumanColor( color == CMODE );
+ #endif
#ifdef MSDOS
if (mem_map)
Only in be: tty.o
Only in be: ttyio.o
Only in be: ttykbd.o
Only in be: wangpc.o
Only in be: window.o
Only in be: word.o